object FExportaTXTContasPagar: TFExportaTXTContasPagar
  Left = 238
  Top = 177
  Width = 349
  Height = 245
  BorderStyle = bsSizeToolWin
  Caption = 'Exporta Contas Pagar para arquivo texto'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 5
    Top = 58
    Width = 100
    Height = 13
    Caption = 'Per'#237'odo Lan'#231'amento'
  end
  object Label2: TLabel
    Left = 101
    Top = 81
    Width = 6
    Height = 13
    Caption = 'a'
  end
  object Label3: TLabel
    Left = 5
    Top = 112
    Width = 119
    Height = 13
    Caption = 'Caminho / Nome Arquivo'
  end
  object DEDataIni: TDateEdit
    Left = 5
    Top = 77
    Width = 90
    Height = 21
    NumGlyphs = 2
    TabOrder = 0
    OnEnter = DEDataIniEnter
  end
  object DEDataFim: TDateEdit
    Left = 117
    Top = 77
    Width = 90
    Height = 21
    NumGlyphs = 2
    TabOrder = 1
    OnEnter = DEDataFimEnter
  end
  object Panel1: TPanel
    Left = 0
    Top = 166
    Width = 341
    Height = 45
    Align = alBottom
    TabOrder = 2
    object PBar: TProgressBar
      Left = 1
      Top = 27
      Width = 339
      Height = 17
      Align = alBottom
      Min = 0
      Max = 100
      TabOrder = 0
    end
    object STStatus: TStaticText
      Left = 1
      Top = 1
      Width = 339
      Height = 17
      Align = alTop
      AutoSize = False
      Caption = 'aaa'
      TabOrder = 1
    end
  end
  object cbSemContrapartida: TCheckBox
    Left = 5
    Top = 36
    Width = 225
    Height = 17
    Caption = 'Gerar lan'#231'amento sem Contrapartida?'
    TabOrder = 3
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 341
    Height = 33
    Align = alTop
    TabOrder = 4
    object BtnExportar: TBitBtn
      Left = 4
      Top = 4
      Width = 75
      Height = 25
      Caption = '&Exportar'
      TabOrder = 0
      OnClick = BtnExportarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      NumGlyphs = 2
    end
    object BitBtn1: TBitBtn
      Left = 252
      Top = 4
      Width = 75
      Height = 25
      Caption = '&Fechar'
      TabOrder = 1
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
  end
  object edCaminhoNome: TFilenameEdit
    Left = 6
    Top = 126
    Width = 323
    Height = 21
    NumGlyphs = 1
    TabOrder = 5
  end
  object QContasPagar: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      
        'Select CP_DATADOCUMENTO,PLANOCONT_DESCRICAO as ContaCredito,CP_V' +
        'ALOR,CP_DOCUMENTO,CP_HISTORICO1,CP_HISTORICO2'
      ',CODIGOAUX,CP_PLANO,CP_CENTROCUSTO'
      ''
      'FROM'
      
        'CentroCusto Right join (CONTASPAGAR left join(Fornecedor inner j' +
        'oin PlanoContabilidade on FORN_CONTACONTABIL = PLANOCONT_CODIGO ' +
        ' ) on CP_FORNECEDOR = Forn_Codigo)'
      'on CentroCusto.Codigo = CP_CENTROCUSTO'
      ''
      'Where (Cp_Origem = 0)'
      ''
      'Order by '
      'CP_Codigo')
    Left = 228
    Top = 72
  end
  object QAux: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'Select PLANOCONT_DESCRICAO as ContaDebito'
      'From PLANOCONTASCENTROCUSTO  inner join PlanoContabilidade on'
      'PLANOCENTRO_CONTACONTABILDEB = PLANOCONT_CODIGO')
    Left = 291
    Top = 72
  end
  object dsIntegContabil: TDataSource
    DataSet = DMIntegracao.QParIntegContabil
    Left = 360
    Top = 88
  end
end
